home *** CD-ROM | disk | FTP | other *** search
/ Developer Helper 1: Phil & Dave's Excellent CD / Excellent CD HFS.raw / HyperCard / HyperCard 1.2.2 International / HyperCard Danish (DK-1.2.2) / Idestakke / Baggrundsideer / background_10122.txt < prev    next >
Text File  |  1988-12-19  |  11KB  |  501 lines
  1. -- background: 10122 from stack: in
  2. -- bmap block id: 31997
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 
  6. ----- HyperTalk script -----
  7. -- These background scripts handle check-boxes on a background by
  8. -- storing the settings of the check-boxes in a hidden field called
  9. -- "checks" and setting and resetting them on open and close card.
  10. --
  11. on newCard
  12.   repeat with i=1 to the number of background buttons
  13.     put "true" & return after field "checks"
  14.   end repeat
  15. end newCard
  16.  
  17. on openCard
  18.   set cursor to 4 -- wristwatch
  19.   repeat with i=1 to the number of background buttons
  20.     set the hilite of background button i to (line i of field "checks" is true)
  21.   end repeat
  22.   set cursor to 1 -- browse tool
  23. end openCard
  24.  
  25. on closeCard
  26.   set cursor to 4 -- wristwatch
  27.   repeat with i=1 to the number of background buttons
  28.     get hilite of background button i
  29.     put it into line i of field "checks"
  30.   end repeat
  31.   set cursor to 1 -- browse tool
  32. end closeCard
  33.  
  34. on newStack
  35.   newCard
  36. end newStack
  37.  
  38. on openBackground
  39.   push recent card
  40. end openBackground
  41.  
  42.  
  43. -- part 8 (field)
  44. -- low flags: 00
  45. -- high flags: 4000
  46. -- rect: left=121 top=91 right=111 bottom=277
  47. -- title width / last selected line: 0
  48. -- icon id / first selected line: 0 / 0
  49. -- text alignment: 0
  50. -- font id: 3
  51. -- text size: 12
  52. -- style flags: 256
  53. -- line height: 16
  54. -- part name: Nummer
  55.  
  56.  
  57. -- part 9 (field)
  58. -- low flags: 00
  59. -- high flags: 4000
  60. -- rect: left=141 top=118 right=138 bottom=277
  61. -- title width / last selected line: 0
  62. -- icon id / first selected line: 0 / 0
  63. -- text alignment: 0
  64. -- font id: 3
  65. -- text size: 12
  66. -- style flags: 256
  67. -- line height: 16
  68. -- part name: 
  69.  
  70.  
  71. -- part 10 (field)
  72. -- low flags: 00
  73. -- high flags: 4000
  74. -- rect: left=89 top=147 right=182 bottom=277
  75. -- title width / last selected line: 0
  76. -- icon id / first selected line: 0 / 0
  77. -- text alignment: 0
  78. -- font id: 3
  79. -- text size: 12
  80. -- style flags: 256
  81. -- line height: 16
  82. -- part name: Titel
  83.  
  84.  
  85. -- part 11 (field)
  86. -- low flags: 00
  87. -- high flags: 4000
  88. -- rect: left=91 top=186 right=221 bottom=277
  89. -- title width / last selected line: 0
  90. -- icon id / first selected line: 0 / 0
  91. -- text alignment: 0
  92. -- font id: 3
  93. -- text size: 12
  94. -- style flags: 256
  95. -- line height: 16
  96. -- part name: 
  97.  
  98.  
  99. -- part 12 (field)
  100. -- low flags: 00
  101. -- high flags: 4000
  102. -- rect: left=100 top=222 right=257 bottom=277
  103. -- title width / last selected line: 0
  104. -- icon id / first selected line: 0 / 0
  105. -- text alignment: 0
  106. -- font id: 3
  107. -- text size: 12
  108. -- style flags: 256
  109. -- line height: 16
  110. -- part name: 
  111.  
  112.  
  113. -- part 13 (field)
  114. -- low flags: 00
  115. -- high flags: 4000
  116. -- rect: left=42 top=271 right=321 bottom=277
  117. -- title width / last selected line: 0
  118. -- icon id / first selected line: 0 / 0
  119. -- text alignment: 0
  120. -- font id: 3
  121. -- text size: 12
  122. -- style flags: 256
  123. -- line height: 16
  124. -- part name: 
  125.  
  126.  
  127. -- part 35 (button)
  128. -- low flags: 00
  129. -- high flags: 0000
  130. -- rect: left=361 top=307 right=332 bottom=388
  131. -- title width / last selected line: 0
  132. -- icon id / first selected line: 15420 / 15420
  133. -- text alignment: 1
  134. -- font id: 0
  135. -- text size: 12
  136. -- style flags: 0
  137. -- line height: 16
  138. -- part name: Prev
  139. ----- HyperTalk script -----
  140. on mouseUp
  141.   visual effect wipe right
  142.   go to previous card
  143. end mouseUp
  144.  
  145.  
  146.  
  147. -- part 36 (button)
  148. -- low flags: 00
  149. -- high flags: 0000
  150. -- rect: left=389 top=307 right=332 bottom=416
  151. -- title width / last selected line: 0
  152. -- icon id / first selected line: 16560 / 16560
  153. -- text alignment: 1
  154. -- font id: 0
  155. -- text size: 12
  156. -- style flags: 0
  157. -- line height: 16
  158. -- part name: Next
  159. ----- HyperTalk script -----
  160. on mouseUp
  161.   visual effect wipe left
  162.   go to next card
  163. end mouseUp
  164.  
  165.  
  166.  
  167. -- part 37 (button)
  168. -- low flags: 00
  169. -- high flags: 6005
  170. -- rect: left=287 top=51 right=67 bottom=347
  171. -- title width / last selected line: 0
  172. -- icon id / first selected line: 0 / 0
  173. -- text alignment: 1
  174. -- font id: 0
  175. -- text size: 12
  176. -- style flags: 0
  177. -- line height: 16
  178. -- part name: 
  179.  
  180.  
  181. -- part 40 (button)
  182. -- low flags: 00
  183. -- high flags: 6005
  184. -- rect: left=300 top=101 right=117 bottom=380
  185. -- title width / last selected line: 0
  186. -- icon id / first selected line: 0 / 0
  187. -- text alignment: 1
  188. -- font id: 0
  189. -- text size: 12
  190. -- style flags: 0
  191. -- line height: 16
  192. -- part name: 
  193.  
  194.  
  195. -- part 52 (button)
  196. -- low flags: 00
  197. -- high flags: 0000
  198. -- rect: left=369 top=155 right=181 bottom=397
  199. -- title width / last selected line: 0
  200. -- icon id / first selected line: 0 / 0
  201. -- text alignment: 1
  202. -- font id: 0
  203. -- text size: 12
  204. -- style flags: 0
  205. -- line height: 16
  206. -- part name: Foto
  207. ----- HyperTalk script -----
  208. on mouseUp
  209.   go to card id 42964
  210. end mouseUp
  211.  
  212.  
  213.  
  214.  
  215. -- part 53 (button)
  216. -- low flags: 00
  217. -- high flags: 0000
  218. -- rect: left=370 top=182 right=208 bottom=396
  219. -- title width / last selected line: 0
  220. -- icon id / first selected line: 0 / 0
  221. -- text alignment: 1
  222. -- font id: 0
  223. -- text size: 12
  224. -- style flags: 0
  225. -- line height: 16
  226. -- part name: 
  227. ----- HyperTalk script -----
  228. on mouseUp
  229.   go to card id 14298
  230. end mouseUp
  231.  
  232.  
  233.  
  234. -- part 54 (button)
  235. -- low flags: 00
  236. -- high flags: 6005
  237. -- rect: left=376 top=51 right=69 bottom=476
  238. -- title width / last selected line: 0
  239. -- icon id / first selected line: 0 / 0
  240. -- text alignment: 1
  241. -- font id: 0
  242. -- text size: 12
  243. -- style flags: 0
  244. -- line height: 16
  245. -- part name: 
  246.  
  247.  
  248. -- part 55 (button)
  249. -- low flags: 00
  250. -- high flags: 2005
  251. -- rect: left=387 top=69 right=87 bottom=481
  252. -- title width / last selected line: 0
  253. -- icon id / first selected line: 0 / 0
  254. -- text alignment: 1
  255. -- font id: 0
  256. -- text size: 12
  257. -- style flags: 0
  258. -- line height: 16
  259. -- part name: 
  260.  
  261.  
  262. -- part 56 (button)
  263. -- low flags: 00
  264. -- high flags: 2005
  265. -- rect: left=387 top=84 right=102 bottom=481
  266. -- title width / last selected line: 0
  267. -- icon id / first selected line: 0 / 0
  268. -- text alignment: 1
  269. -- font id: 0
  270. -- text size: 12
  271. -- style flags: 0
  272. -- line height: 16
  273. -- part name: 
  274.  
  275.  
  276. -- part 57 (button)
  277. -- low flags: 00
  278. -- high flags: 2005
  279. -- rect: left=387 top=100 right=118 bottom=481
  280. -- title width / last selected line: 0
  281. -- icon id / first selected line: 0 / 0
  282. -- text alignment: 1
  283. -- font id: 0
  284. -- text size: 12
  285. -- style flags: 0
  286. -- line height: 16
  287. -- part name: 
  288.  
  289.  
  290. -- part 58 (button)
  291. -- low flags: 00
  292. -- high flags: 2005
  293. -- rect: left=387 top=117 right=135 bottom=481
  294. -- title width / last selected line: 0
  295. -- icon id / first selected line: 0 / 0
  296. -- text alignment: 1
  297. -- font id: 0
  298. -- text size: 12
  299. -- style flags: 0
  300. -- line height: 16
  301. -- part name: 
  302.  
  303.  
  304. -- part 59 (button)
  305. -- low flags: 00
  306. -- high flags: 6005
  307. -- rect: left=387 top=133 right=151 bottom=481
  308. -- title width / last selected line: 0
  309. -- icon id / first selected line: 0 / 0
  310. -- text alignment: 1
  311. -- font id: 0
  312. -- text size: 12
  313. -- style flags: 0
  314. -- line height: 16
  315. -- part name: 
  316.  
  317.  
  318. -- part 60 (button)
  319. -- low flags: 00
  320. -- high flags: 2005
  321. -- rect: left=300 top=69 right=87 bottom=381
  322. -- title width / last selected line: 0
  323. -- icon id / first selected line: 0 / 0
  324. -- text alignment: 1
  325. -- font id: 0
  326. -- text size: 12
  327. -- style flags: 0
  328. -- line height: 16
  329. -- part name: 
  330.  
  331.  
  332. -- part 61 (button)
  333. -- low flags: 00
  334. -- high flags: 2005
  335. -- rect: left=300 top=84 right=102 bottom=381
  336. -- title width / last selected line: 0
  337. -- icon id / first selected line: 0 / 0
  338. -- text alignment: 1
  339. -- font id: 0
  340. -- text size: 12
  341. -- style flags: 0
  342. -- line height: 16
  343. -- part name: 
  344.  
  345.  
  346. -- part 62 (button)
  347. -- low flags: 00
  348. -- high flags: 2005
  349. -- rect: left=300 top=117 right=135 bottom=381
  350. -- title width / last selected line: 0
  351. -- icon id / first selected line: 0 / 0
  352. -- text alignment: 1
  353. -- font id: 0
  354. -- text size: 12
  355. -- style flags: 0
  356. -- line height: 16
  357. -- part name: 
  358.  
  359.  
  360. -- part 63 (button)
  361. -- low flags: 00
  362. -- high flags: 2005
  363. -- rect: left=288 top=142 right=160 bottom=369
  364. -- title width / last selected line: 0
  365. -- icon id / first selected line: 0 / 0
  366. -- text alignment: 1
  367. -- font id: 0
  368. -- text size: 12
  369. -- style flags: 0
  370. -- line height: 16
  371. -- part name: 
  372.  
  373.  
  374. -- part 64 (button)
  375. -- low flags: 00
  376. -- high flags: 2005
  377. -- rect: left=299 top=160 right=176 bottom=369
  378. -- title width / last selected line: 0
  379. -- icon id / first selected line: 0 / 0
  380. -- text alignment: 1
  381. -- font id: 0
  382. -- text size: 12
  383. -- style flags: 0
  384. -- line height: 16
  385. -- part name: 
  386.  
  387.  
  388. -- part 65 (button)
  389. -- low flags: 00
  390. -- high flags: 2005
  391. -- rect: left=299 top=175 right=192 bottom=369
  392. -- title width / last selected line: 0
  393. -- icon id / first selected line: 0 / 0
  394. -- text alignment: 1
  395. -- font id: 0
  396. -- text size: 12
  397. -- style flags: 0
  398. -- line height: 16
  399. -- part name: 
  400.  
  401.  
  402. -- part 66 (button)
  403. -- low flags: 00
  404. -- high flags: 0000
  405. -- rect: left=444 top=146 right=189 bottom=485
  406. -- title width / last selected line: 0
  407. -- icon id / first selected line: 20186 / 20186
  408. -- text alignment: 1
  409. -- font id: 0
  410. -- text size: 12
  411. -- style flags: 0
  412. -- line height: 16
  413. -- part name: 
  414. ----- HyperTalk script -----
  415. on mouseUp
  416.   if the name of this stack contains "Baggrundsideer"
  417.   then
  418.   show card field 1  -- explain why not sort here
  419. else
  420.   answer "Sort√©r alle kortene i denne stak efter:" with "Nummer" or "Titel" or "Annuller"
  421.   if it is "Nummer"
  422.   then sort by first word of first line of field "Nummer"
  423. else if it is "Titel"
  424. then sort by first word of first line of field "Titel"
  425. end if
  426. end mouseUp
  427.  
  428.  
  429.  
  430. -- part 67 (button)
  431. -- low flags: 00
  432. -- high flags: 0000
  433. -- rect: left=403 top=150 right=189 bottom=445
  434. -- title width / last selected line: 0
  435. -- icon id / first selected line: 32670 / 32670
  436. -- text alignment: 1
  437. -- font id: 0
  438. -- text size: 12
  439. -- style flags: 0
  440. -- line height: 16
  441. -- part name: 
  442. ----- HyperTalk script -----
  443. on mouseUp
  444.   show all cards
  445. end mouseUp
  446.  
  447.  
  448.  
  449. -- part 68 (button)
  450. -- low flags: 00
  451. -- high flags: 0000
  452. -- rect: left=455 top=306 right=334 bottom=492
  453. -- title width / last selected line: 0
  454. -- icon id / first selected line: 6720 / 6720
  455. -- text alignment: 1
  456. -- font id: 0
  457. -- text size: 12
  458. -- style flags: 0
  459. -- line height: 16
  460. -- part name: Return
  461. ----- HyperTalk script -----
  462. on mouseUp
  463.   visual effect iris close
  464.   pop card
  465. end mouseUp
  466.  
  467.  
  468.  
  469. -- part 69 (button)
  470. -- low flags: 00
  471. -- high flags: 0000
  472. -- rect: left=290 top=307 right=336 bottom=322
  473. -- title width / last selected line: 0
  474. -- icon id / first selected line: 21847 / 21847
  475. -- text alignment: 1
  476. -- font id: 0
  477. -- text size: 12
  478. -- style flags: 0
  479. -- line height: 16
  480. -- part name: Home
  481. ----- HyperTalk script -----
  482. on mouseUp
  483.   visual effect iris open
  484.   go Home
  485. end mouseUp
  486.  
  487.  
  488.  
  489. -- part 70 (field)
  490. -- low flags: 80
  491. -- high flags: 0000
  492. -- rect: left=17 top=38 right=328 bottom=43
  493. -- title width / last selected line: 0
  494. -- icon id / first selected line: 0 / 0
  495. -- text alignment: 0
  496. -- font id: 3
  497. -- text size: 9
  498. -- style flags: 0
  499. -- line height: 12
  500. -- part name: Checks
  501.